function ber=blast_accuracy(transmitted,received)

ber=sum((transmitted & received) + (1 - (transmitted | received)))/length(transmitted);